-- Written for Daggerfall Unity by Harbinger451
Quest: PROST013
DisplayName: Sacred Sex
-- Message panels
QRC:

QuestorOffer:  [1000]
<ce>                Only the missionaries of Dibella can offer
<ce>             you the ecstatic rite of sacred sex, my friend!
<ce>              I can point you toward just such a missionary
<ce>                        if you are so inclined?
                                     <--->
<ce>                Only missionaries of the House of Dibella
<ce>                     can offer such ecstatic rites!
<ce>              Though, if you are interested in such a rite,
<ce>            I can give you the name of someone who will help?
                                     <--->
<ce>                For a small donation the House of Dibella
<ce>            will offer the rite of sacred sex to non-members.
<ce>               Perhaps I can refer you to one of Dibella's
<ce>                       wandering missionaries?

RefuseQuest:  [1001]
<ce>                       What? Then why did you ask?
                                     <--->
<ce>               I'm doing you a favor by just talking to you.
                                     <--->
<ce>                        I'm just trying to help,
<ce>                   you don't have to so rude about it

AcceptQuest:  [1002]
<ce>                      _priest_ will be in _temple_
<ce>                   at __temple_ for =traveltime_ days.
<ce>                     They'll perform the sacred rite
<ce>                           with you, I'm sure. 
                                     <--->
<ce>                  A certain _priest_ will be in _temple_
<ce>                    at __temple_ for =traveltime_ days.
<ce>                           Visit them there. 
<ce>                 Though no more than an agent of Dibella,
<ce>                in the sacred moment of the rite they act
<ce>                      as the Blessed Lady herself.
                                     <--->
<ce>                     I hear _priest_ is in _temple_
<ce>                       at __temple_. See if
<ce>               Dibella, the Passion Dancer, will possess
<ce>                     you both in an orgy of ecstasy.
<ce>              They'll only be there for =traveltime_ days. 
                                     <--->
<ce>                The person you are looking for is _priest_.
<ce>              They are currently in _temple_ at __temple_.
<ce>             But they'll only be there for =traveltime_ days. 
<ce>                    Prepare yourself for a writhing
<ce>                     in ecstatic joy and pleasure.

QuestFail:  [1003]
<ce>                 It seems you are a little short of gold.
<ce>                    I cannot perform the rite without
<ce>                         the required donation.
                                     <--->
<ce>               It seems you do not have enough money, %pcf.
<ce>                I must refuse you the rite of sacred sex.
                                     <--->
<ce>                 I'm afraid your purse is a little light.
<ce>                     I must ask that you leave me be.

QuestComplete:  [1004]
<ce>                      It was a pleasure tending to
<ce>                        your sacred needs, %pcf. 
<ce>                     Dibella smiles on us both for
<ce>                   the fervent service we showed her.
                                     <--->
<ce>                    You seemed to enjoy yourself, %pcf.
<ce>                 As did I... I hope we meet again sometime,
<ce>             and maybe show our devotion to the goddess once more.
                                     <--->
<ce>              Well, %pcf. You certainly were enthusiastic.
<ce>                   Please return to show your love for
<ce>                      me -- I mean for the goddess.

RumorsPostsuccess:  [1007]
_priest_ has been distracted lately. Fallen hard for an attractive supplicant, apparently.
<--->
_priest_ is looking for a particular %ra freebooter. Brought %g2 closer to Dibella than anyone before.

QuestorPostsuccess:  [1008]
Oh, it's you, %pcf. I heard you met with _priest_ and gave good praise to Dibella.
<--->
_priest_ won't stop singing your praises, %pcf. I think %g1 enjoyed you almost as much as you did %g2.

QuestLogEntry:  [1010]
%qdt
_qgiver_ in __qgiver_ of ___qgiver_
recommended I visit a missionary of Dibella called
_priest_ in _temple_ at __temple_.
I have =traveltime_ days to meet up with them there, 

Message:  1011
%qdt:
I met with _priest_ in _temple_ at __temple_
and had some ecstatic sacred sex.
It only cost me the donation of 200 gold pieces.

Message:  1012
<ce>                 So _qgiver_ said I would perform the rite
<ce>                    of sacred sex with you. Very well.
<ce>                   All that I ask in return, is a small
<ce>                   donation of 200 gold, and the purest
<ce>                   pleasures of the flesh will be yours.
                                     <--->
<ce>                 So _qgiver_ said I would perform the rite
<ce>                    of sacred sex with you. Very well.
<ce>                But first, bless the House of Dibella with a
<ce>                     donation of 200 gold pieces ...
<ce>                a temporal payment for a heavenly reward.
                                     <--->
<ce>                 So _qgiver_ said I would perform the rite
<ce>                    of sacred sex with you. Very well.
<ce>              Though it pains me to ask, first you must make
<ce>              a donation of 200 gold pieces. We must weed out
<ce>               those taking advantage of our holy piousness
<ce>                 to satiate their wholly impious pleasures.

Message:  1013
<ce>            Your willingness to donate is good news indeed, %pcf.
<ce>                      Now, by the grace of Dibella, 
<ce>                             we will begin.

Message:  1014
<ce>                  You balk at the request for a donation.
<ce>                  Something tells me your intentions were
<ce>                    less than pious. Begone with you!
                                     <--->
<ce>                  Teasing me is like teasing the goddess.
<ce>                    Dibella will not look kindly on you!
                                     <--->
<ce>                 My, but you're a fickle one, aren't you?
<ce>                With your love of money perhaps you should
<ce>                  consider devoting yourself to Zenithar.

Message:  1015
<ce>                      Feel Dibella's embrace, %pcf.
<ce>                        Feel her arms around you.
<ce>                       Feel her love overwhelm you.
<ce>                                  ...
<ce>                          Let me touch you here.
<ce>                          Now you touch me there.
<ce>                            Oh, that's good.
<ce>                      Caress me. Yes, that's right.
<ce>                                  ...
<ce>                           There. Yes, there!
<ce>                                  ...
<ce>                               Yes, YES!
<ce>                           Kiss me! Love me!
<ce>                                  ...
<ce>                             Mmmmh! Ooooh!
<ce>                                Aaaaaah!
<ce>                                  ...
<ce>                       By Dibella herself, %pcf.
<ce>                That was a most ... edifying experience!
                                     <--->
<ce>                      Feel Dibella's embrace, %pcf.
<ce>                        Feel her arms around you.
<ce>                       Feel her love overwhelm you.
<ce>                                  ...
<ce>               There is something irresistible about you.
<ce>                      I can barely control myself!
<ce>                                  ...
<ce>                     Take me. Oh, yes! You know how.
<ce>                       Love me. Yes, that's right.
<ce>                                  ...
<ce>                          Caress me! Feel me!
<ce>                                  ...
<ce>                        Keep going! Don't stop!
<ce>                                  ...
<ce>                          Ooooh goddess, YES!
<ce>                                  ...
<ce>                     By the Lady of Beauty herself,
<ce>                 you certainly have a gift, my friend!

QBN:

Person _qgiver_ group Questor
Person _priest_ faction The_House_of_Dibella

Place _temple_ remote temple

Clock _traveltime_ 00:00 0 flag 1 range 1 2

-- Quest start-up:
	start timer _traveltime_
	log 1010 step 0
	place npc _priest_ at _temple_

_traveltime_ task:
	remove log step 0
	end quest

_priestclicked_ task:
	clicked npc _priest_

_successorfailure_ task:
	when _priestclicked_
	prompt 1012 yes _pcpay_ no _pctight_

_pcpay_ task:
    say 1013
    pay 200 money do _pcpaid_ otherwise do _pcpoor_

_pctight_ task:
    say 1014
    change repute with _priest_ by -2
    remove log step 0
    end quest

_pcpaid_ task:
    clear _pcpay_
    say 1015
    change repute with _priest_ by +5
    train pc Etiquette
    give pc nothing
    remove log step 0
    log 1011 step 1
    end quest

_pcpoor_ task:
    say 1003
    remove log step 0
    end quest
